home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d7 / ezdial10.arc / MENU.SLT < prev    next >
Text File  |  1988-07-07  |  3KB  |  110 lines
  1. str code1[] = "XXXXXXXX";     //Enter your User ID for the X's
  2. str code2[] = "YYYYYYYY^M";   //Enter your password for the Y's
  3. str cr[] = "^M";
  4. str sender[];
  5. str input[6] = "      ";
  6. str code3[25];
  7. str part1[] = "C D/";
  8. str part2[] = "/12,";
  9. str part3[];
  10. str fon_ext[] = ".FON";
  11. str fon1[9];
  12. int phone;
  13.  
  14. main()
  15. {
  16.  input = "      ";
  17.  set_cparams(1200,0,8,1);
  18.  clear_scr();
  19.  prints("     ****************************************************************");
  20.  prints("     *                E-Z DIALER ver. 1.00                          *");
  21.  prints("     *                                                              *");
  22.  prints("     *   GAATL...Atlanta    MABOS...Boston     ILCHI...Chicago      *");
  23.  prints("     *   OHCLV...Cleve.     TXDAL...Dallas     CODEN...Denver       *");
  24.  prints("     *   MIDET...Detroit    CAGLE...Glendale   CTHAR...Hartford     *");
  25.  prints("     *   TXHOU...Houston    MOKAN...K City     CALAN...L. A.        *");
  26.  prints("     *   FLMIA...Miami      WIMIL...Milw.      MNMIN...Minn.        *");
  27.  prints("     *   NJNEW...Newark     NYNYO...NY City    CAPAL...Palo Alto    *");
  28.  prints("     *   AZPHO...Phoenix    ORPOR...Portland   NCRTP...RT Park      *");
  29.  prints("     *   CARIV...Riverside  CASAC...Sacro.     UTSLC...SL City      *");
  30.  prints("     *   CASAD...San Diego  CASFA...San Fran.  CASJO...San Jose     *");
  31.  prints("     *   CASAN...Santa Ana  WASEA...Seattle    MOSLO...St Louis     *");
  32.  prints("     *   FLTAM...Tampa      DCWAS...D.C                             *");
  33.  prints("     *          EXEC...Exec-PC      PCP...Pursuit BBS               *");
  34.  prints("     *                      BYE...Log off                           *");
  35.  prints("     ****************************************************************");
  36.  prints("     Enter your choice.......                                        ");
  37.  gets(input,6);
  38.   strupper(input);
  39.   if (input == "EXEC")
  40.     calld("exec");
  41.   else if (input == "PCP")
  42.     calld("pcpbbs");
  43.   else if (input == "BYE")
  44.     call("bye");
  45.   else
  46.     dial_it(input);
  47. }
  48. dial_it(str input)
  49. {
  50. int status, t1, t2, t3, t4, t5, t6, phone;
  51. t1 = track("@",1);
  52. t2 = track("PASSWORD = ",1);
  53. t3 = track("CONNECTED",1);
  54. t4 = track("BUSY",1);
  55. t5 = track("UNRECOGNIZED",1);
  56. t6 = track("NOT OPERATING",1);
  57.  
  58.   {
  59.    strcat(code3,part1);
  60.    strcat(code3,input);
  61.    strcat(code3,part2);
  62.    strcat(code3,code1);
  63.    strcat(code3,cr);
  64.   }
  65.  
  66. cputs(cr);
  67.  
  68. while (1)
  69.   {
  70.    terminal();
  71.  
  72.    status = track_hit(0);
  73.  
  74.     if (status == t1)
  75.        cputs(code3);
  76.  
  77.     if (status == t2)
  78.        cputs(code2);
  79.  
  80.     if (status == t3)
  81.        {
  82.        strcat(input,".FON");
  83.        loadfon(input);
  84.        dial();
  85.        break;
  86.        }
  87.  
  88.     if (status == t4)
  89.        continue;
  90.  
  91.     if (status == t5)
  92.        break;
  93.  
  94.     if (status == t6)
  95.        {
  96.        clear_scr();
  97.        prints("Error dialing City. It is not operating. Press F9");
  98.        break;
  99.        }
  100.  
  101.   }
  102. track_free(t1);
  103. track_free(t2);
  104. track_free(t3);
  105. track_free(t4);
  106. track_free(t5);
  107.  
  108.  
  109. }
  110.